home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM A / PD-ROM A.iso / HyperCard / Business / Mouse Alarm < prev    next >
MacBinary  |  1991-12-16  |  189.3 KB  |  [STAK/WILD]

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Mouse Alarm

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert HyperCard Stack (archive/hypercard) idMeta Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
100% file MacBinary II, inited, Mon Dec 16 14:48:15 1991, modified Mon Dec 16 17:26:00 1991, creator HyperCard, type HyperCard stack, 49152 bytes "Mouse Alarm" , at 0xc080 144449 bytes resource default (weak)
99% file data default
74% TrID Mac HyperCard stack (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[STAK]
macFileCreator[WILD]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 4d 6f 75 73 65 20 | 41 6c 61 72 6d 00 00 00 |..Mouse |Alarm...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 53 54 41 4b 57 49 4c | 44 01 00 00 00 00 00 00 |.STAKWIL|D.......|
|00000050| 00 00 00 00 00 c0 00 00 | 02 34 41 a5 72 b3 7f a5 |........|.4A.r...|
|00000060| 72 d8 78 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.x.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 1a e1 00 00 |........|........|
|00000080| 00 00 08 00 53 54 41 4b | ff ff ff ff 00 00 00 00 |....STAK|........|
|00000090| 00 00 00 0a 00 00 c0 00 | 00 00 08 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 01 | 00 00 0a 38 00 00 00 02 |........|...8....|
|000000b0| 00 00 0b ff 00 00 08 cb | 00 00 00 04 00 00 5e c0 |........|......^.|
|000000c0| 00 00 00 00 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 02 10 80 00 02 10 80 00 | 02 10 80 00 02 10 80 00 |........|........|
|000000f0| e2 16 70 c7 00 00 00 00 | 00 00 00 00 00 00 00 00 |..p.....|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 0d fe 00 00 0c 18 | 00 f0 01 a0 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|00000350| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|00000360| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|00000370| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000380| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000390| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|000003a0| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|000003b0| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|000003c0| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|000003d0| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|000003e0| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|000003f0| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000400| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000410| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|00000420| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|00000430| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|00000440| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|00000450| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|00000460| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|00000470| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000480| 00 00 12 c0 00 00 00 40 | 00 00 1b e0 00 00 1a 60 |.......@|.......`|
|00000490| 00 00 58 20 00 00 22 60 | 00 00 9e 20 00 00 21 c0 |..X .."`|... ..!.|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 00 6e 20 49 64 6c 65 0d | 47 6c 6f 62 61 6c 20 4c |.n Idle.|Global L|
|00000690| 6f 63 78 0d 49 66 20 74 | 68 65 20 4d 6f 75 73 65 |ocx.If t|he Mouse|
|000006a0| 4c 6f 63 20 69 73 20 6e | 6f 74 20 4c 6f 63 78 20 |Loc is n|ot Locx |
|000006b0| 74 68 65 6e 0d 50 75 74 | 20 74 68 65 20 6e 75 6d |then.Put| the num|
|000006c0| 62 65 72 20 6f 66 20 63 | 64 20 62 75 74 74 6f 6e |ber of c|d button|
|000006d0| 73 20 69 6e 74 6f 20 52 | 61 6e 64 78 0d 50 75 74 |s into R|andx.Put|
|000006e0| 20 74 68 65 20 52 61 6e | 64 6f 6d 20 6f 66 20 52 | the Ran|dom of R|
|000006f0| 61 6e 64 78 20 69 6e 74 | 6f 20 50 6c 61 79 6e 75 |andx int|o Playnu|
|00000700| 6d 0d 53 65 6e 64 20 22 | 4d 6f 75 73 65 55 70 22 |m.Send "|MouseUp"|
|00000710| 20 74 6f 20 63 64 20 62 | 75 74 74 6f 6e 20 50 6c | to cd b|utton Pl|
|00000720| 61 79 6e 75 6d 0d 45 6e | 64 20 69 66 0d 50 75 74 |aynum.En|d if.Put|
|00000730| 20 74 68 65 20 6d 6f 75 | 73 65 4c 6f 63 20 69 6e | the mou|seLoc in|
|00000740| 74 6f 20 4c 6f 63 78 0d | 45 6e 64 20 49 64 6c 65 |to Locx.|End Idle|
|00000750| 0d 00 49 64 6c 65 0d 00 | 00 00 00 00 00 00 00 00 |..Idle..|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 50 cb 00 00 54 6e | 00 00 94 38 00 01 b2 ff |..P...Tn|...8....|
|000008b0| 00 00 98 18 00 00 99 fe | 00 00 00 b6 00 00 b3 2b |........|.......+|
|000008c0| 00 03 d4 0f 00 00 9b 08 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a80| 00 00 00 80 4c 49 53 54 | 00 00 08 cb 00 00 00 00 |....LIST|........|
|00000a90| 00 00 00 01 00 00 08 00 | 00 00 00 02 00 10 00 02 |........|........|
|00000aa0| 00 03 00 04 c0 00 01 2f | 00 00 00 02 00 00 00 00 |......./|........|
|00000ab0| 00 00 09 6e 00 02 00 00 | 00 00 00 00 00 00 00 00 |...n....|........|
|00000ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b00| 00 00 08 00 50 41 47 45 | 00 00 09 6e 00 00 00 00 |....PAGE|...n....|
|00000b10| 00 00 08 cb dc 00 02 31 | 00 00 0b ff 40 00 00 00 |.......1|....@...|
|00000b20| 00 00 00 00 00 00 00 00 | 00 00 10 0f 20 00 00 00 |........|.... ...|
|00000b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001000| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001300| 00 00 00 40 42 4b 47 44 | 00 00 0a 38 00 00 00 00 |...@BKGD|...8....|
|00001310| 00 00 00 00 00 00 00 00 | 00 00 00 02 00 00 0a 38 |........|.......8|
|00001320| 00 00 0a 38 00 00 00 00 | 00 00 00 00 00 00 00 00 |...8....|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 40 46 52 45 45 | 00 00 00 00 00 00 00 00 |...@FREE|........|
|00001350| 0f 46 72 65 65 20 4f 62 | 6a 65 63 74 20 20 20 20 |.Free Ob|ject |
|00001360| 00 00 09 6e 00 00 0a 38 | 00 00 00 00 00 00 00 00 |...n...8|........|
|00001370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001380| 00 00 00 20 53 54 42 4c | 00 00 0c 18 00 00 00 00 |... STBL|........|
|00001390| 00 00 00 00 00 00 00 01 | 00 00 00 00 00 00 00 00 |........|........|
|000013a0| 00 00 00 40 46 54 42 4c | 00 00 0d fe 00 00 00 00 |...@FTBL|........|
|000013b0| 00 00 00 01 00 00 00 00 | 00 00 43 68 69 63 61 67 |........|..Chicag|
|000013c0| 6f 00 00 00 00 00 00 4c | 00 26 11 40 00 00 00 40 |o......L|.&.@...@|
|000013d0| 43 41 52 44 00 00 0b ff | 00 00 00 00 00 00 00 00 |CARD....|........|
|000013e0| 00 00 03 00 42 4d 41 50 | 00 00 11 08 00 00 00 00 |....BMAP|........|
|000013f0| 00 00 00 00 00 01 00 00 | 00 00 00 00 00 f0 01 a0 |........|........|
|00001400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 f0 01 a0 |........|........|
|00001410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 02 b8 |........|........|
|00001420| bf 82 bf 82 bf 82 a3 82 | 8a e1 1e 40 15 20 0f 3c |........|...@. .<|
|00001430| 40 20 07 c2 80 60 60 78 | 7f 00 01 00 60 01 01 f8 |@ ...``x|....`...|
|00001440| 04 02 00 30 15 18 0f 1c | 20 c1 00 18 60 80 81 86 |...0....| ...`...|
|00001450| 00 80 12 80 22 06 02 12 | 90 24 10 48 0f 3d 40 20 |...."...|.$.H.=@ |
|00001460| 10 25 02 80 c1 00 02 80 | 01 00 04 00 c0 24 60 60 |.%......|.....$``|
|00001470| 0f 2c 10 80 c1 47 88 00 | 02 3a 0f 80 04 72 04 00 |.,...G..|.:...r..|
|00001480| 30 01 08 00 41 c1 c0 03 | c0 f8 00 22 10 38 0d 4c |0...A...|...".8.L|
|00001490| 80 10 08 40 12 04 13 40 | 62 40 08 08 01 00 82 c1 |...@...@|b@......|
|000014a0| 30 04 21 04 8c 4d 2c c6 | 0d 4c 09 00 90 24 02 c1 |0.!..M,.|.L...$..|
|000014b0| 30 0e 00 08 20 00 08 20 | 32 90 00 04 c1 10 00 12 |0... .. |2.......|
|000014c0| 04 00 08 05 01 0d e1 21 | 02 0c 12 01 32 01 00 19 |.......!|....2...|
|000014d0| 44 a0 0f 84 71 13 30 0d | 1c 06 24 01 02 02 c1 10 |D...q.0.|..$.....|
|000014e0| 10 00 10 10 22 00 60 12 | 40 c1 0f 00 89 8c 04 ca |....".`.|@.......|
|000014f0| 51 3e 0c 3b 01 20 48 04 | c2 c1 0e 00 02 80 00 02 |Q>.;. H.|........|
|00001500| 80 22 12 04 80 04 e0 08 | 80 14 66 0d 4c 10 80 90 |."......|..f.L...|
|00001510| 24 12 30 52 23 88 00 23 | 88 c1 00 01 08 00 02 10 |$.0R#..#|........|
|00001520| 13 80 32 02 10 18 0d 5e | 08 40 11 00 80 12 40 32 |..2....^|.@....@2|
|00001530| 40 00 11 23 03 80 12 88 | 23 22 3e 0c 4b 02 09 04 |@..#....|#">.K...|
|00001540| 47 c3 88 0e 21 71 0f 80 | 00 04 1e 00 04 08 a0 90 |G...!q..|........|
|00001550| 40 05 80 00 04 70 0c 01 | 22 3d 0d 4e 20 10 80 02 |@....p..|"=.N ...|
|00001560| 53 8f c2 00 8f c2 75 10 | 13 82 04 40 00 01 0e 0b |S.....u.|...@....|
|00001570| c1 03 02 2c 18 60 60 c3 | 06 22 c0 26 c2 00 c0 26 |...,.``.|.".&...&|
|00001580| 45 b0 22 c0 24 60 08 81 | 04 20 10 40 c3 0d a8 82 |E.".$`..|. .@....|
|00001590| 1c 10 e1 15 10 e1 01 3a | 03 03 0c 13 fc e1 11 0c |.......:|........|
|000015a0| 14 1e 0c 4a 04 04 24 20 | 12 03 12 10 16 10 26 04 |...J..$ |......&.|
|000015b0| 24 e1 01 2c 30 c0 33 80 | 00 60 16 60 26 18 30 e1 |$..,0.3.|.`.`&.0.|
|000015c0| 01 1c 10 12 02 c1 18 01 | c0 00 61 86 dd c1 43 1e |........|..a...C.|
|000015d0| 00 1f 03 c1 c3 b8 00 11 | dc 0c 30 38 0d 3c 21 18 |........|..08.<!.|
|000015e0| 00 c3 0c 04 06 30 8c 82 | 09 02 20 c0 00 8c 61 80 |.....0..|.. ...a.|
|000015f0| 20 8c 30 44 23 20 22 10 | 40 c6 0d 1b f8 43 30 00 | .0D# ".|@....C0.|
|00001600| 08 08 33 40 10 30 62 80 | 40 40 90 08 02 42 01 00 |..3@.0b.|@@...B..|
|00001610| 01 01 0d 7c 02 00 01 c6 | 0c 81 81 72 01 83 81 8e |...|....|...r....|
|00001620| 01 01 1e c1 20 8e 23 c4 | 70 40 00 38 12 30 0d 0c |.... .#.|p@.8.0..|
|00001630| c1 03 18 06 18 11 12 89 | 8c 24 61 81 c1 8c 21 00 |........|.$a...!.|
|00001640| 11 04 20 00 63 23 02 51 | 0d 1b f8 43 e0 11 03 30 |.. .c#.Q|...C...0|
|00001650| 15 1c 1d 66 0d 1f e0 12 | c0 15 1c 2d 18 02 0c 5e |...f....|...-...^|
|00001660| 06 18 08 81 10 05 c1 61 | 80 00 21 00 11 04 20 26 |.......a|..!... &|
|00001670| 22 18 0c 0d c1 18 01 c6 | 04 51 e8 0c 1c 32 01 8e |".......|.Q...2..|
|00001680| 00 c1 0d 1e 20 8e 23 c4 | 00 03 42 03 82 3d 18 0c |.... .#.|..B..=..|
|00001690| 0d c1 80 00 30 00 08 00 | 40 80 23 30 00 c1 40 80 |....0...|@.#0..@.|
|000016a0| 40 40 90 08 00 10 42 10 | 01 00 12 0c 6a 01 01 08 |@@....B.|....j...|
|000016b0| 40 00 0c c3 22 c6 18 20 | 44 02 04 10 c0 00 20 61 |@...".. |D..... a|
|000016c0| 80 20 8c 30 82 08 08 41 | 08 80 c3 0a 0c bf 82 bf |. .0...A|........|
|000016d0| 82 bf 82 ad 82 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016e0| 00 00 05 80 42 4d 41 50 | 00 00 0f 2b 00 00 00 00 |....BMAP|...+....|
|000016f0| 00 00 00 00 00 01 00 00 | 00 00 00 00 00 f0 01 a0 |........|........|
|00001700| 00 47 00 03 00 ea 01 3b | 00 38 00 42 00 e8 01 54 |.G.....;|.8.B...T|
|00001710| 00 00 00 00 00 00 00 00 | 00 00 00 44 00 00 04 e8 |........|...D....|
|00001720| 8d 1b 04 e1 1b 10 b9 85 | e2 12 80 14 10 a3 85 1b |........|........|
|00001730| 04 14 01 e1 07 b0 85 bd | 81 1e 08 15 40 16 20 18 |........|....@. .|
|00001740| 10 03 e1 14 40 16 20 0c | b6 85 10 10 1c 20 e1 0a |....@. .|..... ..|
|00001750| 85 1e 08 e1 15 10 03 a9 | 85 81 e1 11 08 1c 10 09 |........|........|
|00001760| bf 85 b2 85 8c 10 20 e2 | 21 08 00 b4 85 8a 44 40 |...... .|!.....D@|
|00001770| 20 07 80 c3 60 60 78 7f | 00 04 01 80 04 07 e0 10 | ...``x.|........|
|00001780| 08 03 c0 3c 03 c0 78 07 | 80 78 07 80 04 34 20 00 |...<..x.|.x...4 .|
|00001790| 18 c1 60 80 81 86 00 80 | 00 02 23 18 08 e1 35 40 |..`.....|..#...5@|
|000017a0| 20 10 15 0a 52 0a 00 04 | 00 10 0f 24 10 80 c1 47 | ...R...|...$...G|
|000017b0| 88 00 02 3a 0f 80 10 52 | 10 00 c0 04 20 0f 44 80 |...:...R|.... .D.|
|000017c0| 10 08 40 12 04 12 01 52 | 01 00 20 20 04 0f 44 09 |..@....R|.. ..D.|
|000017d0| 00 90 24 32 30 0e 00 c1 | 20 80 00 20 80 00 02 40 |..$20...| .. ...@|
|000017e0| 0f 29 02 0c 12 04 32 04 | 00 64 e1 01 14 06 24 01 |.)....2.|.d....$.|
|000017f0| 02 02 c1 40 40 00 40 40 | 88 01 80 0f 33 01 20 48 |...@@.@@|....3. H|
|00001800| 44 c1 0e 00 0a 52 0a 00 | 88 48 12 0f 44 10 80 90 |D....R..|.H..D...|
|00001810| 24 12 30 32 8e 20 00 c2 | 8e 20 00 04 20 00 40 04 |$.02. ..|. .. .@.|
|00001820| 00 40 08 00 80 08 00 80 | 04 76 08 40 11 00 80 00 |.@......|.v.@....|
|00001830| 01 12 01 12 44 22 03 00 | c1 30 03 00 60 06 00 60 |....D"..|.0..`..`|
|00001840| 06 05 8b 23 02 09 c2 04 | 4f c8 1f 21 f1 0f 81 00 |...#....|O..!....|
|00001850| 10 79 00 10 66 82 41 0f | 8a 46 20 10 80 02 62 02 |.y..f.A.|.F ...b.|
|00001860| 3f 08 02 3f 08 33 02 40 | 24 c1 02 40 48 04 80 48 |?..?.3.@|$..@H..H|
|00001870| 04 80 04 53 03 02 2c 18 | 60 c3 60 c3 06 00 03 00 |...S..,.|`.`.....|
|00001880| 98 03 00 99 16 c0 8b 01 | 40 14 01 40 28 02 80 28 |........|@..@(..(|
|00001890| 02 80 04 8c 10 20 e2 21 | 08 00 a6 85 8a 29 07 c0 |..... .!|.....)..|
|000018a0| 1e 3c 0a 19 08 1d 20 0c | 19 10 1d c0 0c 09 c2 23 |.<.... .|.......#|
|000018b0| e3 67 87 38 03 b3 80 e0 | 03 9c 0f 0e e0 00 38 0b |.g.8....|......8.|
|000018c0| 09 c2 44 24 88 40 c4 00 | 4c 43 18 00 62 10 81 11 |..D$.@..|LC..b...|
|000018d0| 18 46 0b 59 08 00 20 20 | 02 12 24 c1 04 00 01 00 |.F.Y.. |..$.....|
|000018e0| 40 08 00 82 0b 6b df 00 | 71 00 63 00 c1 c0 00 38 |@....k..|q.c....8|
|000018f0| be 01 c2 00 14 0b 3b 1e | 00 88 12 09 c1 44 00 44 |......;.|.....D.D|
|00001900| 3c 00 03 18 08 0b 1b 11 | 24 01 98 12 22 13 9c 0b |<.......|$..."...|
|00001910| 39 08 00 27 15 60 12 4e | 23 42 04 0a 29 44 20 12 |9..'.`.N|#B..)D .|
|00001920| 88 33 88 00 44 24 70 30 | 0a 29 03 e0 12 71 52 08 |.3..D$p0|.)...qR.|
|00001930| f4 00 38 80 32 18 b0 30 | 0a 59 20 00 27 00 02 12 |..8.2..0|.Y .'...|
|00001940| 04 22 01 4e 32 80 02 24 | 0a 19 18 c2 01 11 00 84 |.".N2..$|........|
|00001950| 00 84 23 0c 00 42 22 02 | 08 40 8c 14 0a 8c 10 20 |..#..B".|.@..... |
|00001960| 2b 04 80 24 02 40 2e 08 | 00 a2 85 8a 1c 01 16 80 |+..$.@..|........|
|00001970| e1 1c 06 15 03 e1 01 b0 | 85 b1 81 89 7c 0f ff ff |........|....|...|
|00001980| ff ff ff f0 e1 01 1c 08 | 15 10 e1 01 19 80 12 08 |........|........|
|00001990| 15 10 e1 01 8a 37 3e 38 | 60 c1 03 80 01 81 8f e3 |.....7>8|`.......|
|000019a0| f0 7f 29 07 80 07 37 40 | 01 20 02 c1 02 02 00 10 |..)...7@|. ......|
|000019b0| 0c 00 80 10 13 02 12 01 | 09 37 80 01 80 16 02 12 |........|.7......|
|000019c0| 60 13 0c 12 06 09 66 01 | 1f 00 83 e0 08 52 01 f0 |`.....f.|.....R..|
|000019d0| 60 0f 80 c1 00 0f 00 1c | 00 03 c1 b0 09 66 02 21 |`.......|.....f.!|
|000019e0| 01 04 10 07 14 10 12 8c | c1 30 c0 23 11 84 22 48 |........|.0.#.."H|
|000019f0| c0 08 37 40 00 08 c1 10 | 11 00 7c 01 c0 00 0e 32 |..7@....|..|....2|
|00001a00| 40 20 41 22 10 10 09 39 | 11 c0 22 34 32 00 01 c1 |@ A"...9|.."42...|
|00001a10| 00 8f 10 0a 20 0f 80 70 | 09 39 02 20 44 44 44 00 |.... ..p|.9. DDD.|
|00001a20| 01 8c c1 10 80 04 31 8f | 00 18 c0 08 5d 7c 01 c0 |......1.|....]|..|
|00001a30| 44 0e 44 4e 00 08 80 0a | 17 40 4e 21 00 13 80 12 |D.DN....|.@N!....|
|00001a40| 80 07 66 02 21 00 02 20 | 44 14 22 33 10 80 38 14 |..f.!.. |D."3..8.|
|00001a50| 06 08 57 1f 00 11 c0 22 | 32 01 f0 11 c1 0f 80 0c |..W...."|2.......|
|00001a60| 8f 10 58 01 80 12 c6 08 | 16 01 32 08 10 11 27 40 |..X.....|..2...'@|
|00001a70| 40 c1 20 01 08 13 80 04 | 04 80 07 89 57 3e 31 83 |@. .....|....W>1.|
|00001a80| e3 0c c2 0b 03 0f f3 04 | 7f 90 1c 0f 00 38 03 87 |........|.....8..|
|00001a90| 73 01 c1 08 1c 08 15 10 | e1 01 7c 0f ff ff ff ff |s.......|..|.....|
|00001aa0| ff f0 e1 01 b0 81 1f 01 | e1 04 2f 03 80 e1 03 3f |........|../....?|
|00001ab0| 03 8d 80 e1 02 3f 06 cf | c0 e1 02 3f 06 cc c0 e1 |.....?..|...?....|
|00001ac0| 02 3f 0f ec c0 e1 02 85 | 3f 0c 6c c0 e1 02 a2 81 |.?......|?.l.....|
|00001ad0| 1f 60 e1 04 2e 01 e0 e1 | 04 1b 3e c1 3f 80 07 e0 |.`......|..>.?...|
|00001ae0| 01 fc c3 e0 e1 8a 5b 20 | 21 80 06 20 e1 04 e1 40 |......[ |!.. ...@|
|00001af0| 01 0c 22 20 e1 e1 11 01 | e1 02 5b 02 00 42 04 01 |.." ....|..[..B..|
|00001b00| 32 02 40 22 0f 1d a5 c1 | 1a 0e 9f 02 00 be 5c 70 |2.@"....|......\p|
|00001b10| 0e 2c 01 18 c1 20 50 20 | 00 10 41 81 88 0e 0e c1 |.,... P |..A.....|
|00001b20| 4c 26 40 04 00 a0 00 40 | 0e 4c 01 08 00 02 14 80 |L&@....@|.L......|
|00001b30| 0f 2c 02 09 c1 04 04 02 | 01 04 01 80 c0 0e 1d 10 |.,......|........|
|00001b40| c1 90 80 c1 82 80 00 08 | 88 0e 6c 21 00 08 03 00 |........|..l!....|
|00001b50| 08 22 10 10 0e 89 3b 3c | 7d ce c1 ef 70 38 7c 7f |."....;<|}...p8|.|
|00001b60| fc e7 80 0e 8a 4c 84 11 | 10 81 33 03 28 9f 0e 89 |.....L..|..3.(...|
|00001b70| 3b 1f fb df c1 ff ff 38 | 78 3f ff cf 3f 0e 8a 1c |;......8|x?..?...|
|00001b80| 04 22 40 40 42 20 08 c0 | 80 0d 3b 10 80 20 c1 00 |."@@B ..|..;.. ..|
|00001b90| 47 08 08 04 02 00 1c 0e | 2b 0c 80 72 07 90 70 3a |G.......|+..r..p:|
|00001ba0| cd c6 e0 0e 2a 01 fc 64 | 1f ff 81 10 01 04 0e 1a |....*..d|........|
|00001bb0| 06 17 78 13 80 0d 1a 08 | 63 01 ff ff f8 07 c0 e1 |..x.....|c.......|
|00001bc0| 89 4a 07 ff ff fe 44 0f | ff f0 1f 0e 3a 01 ff ff |.J....D.|....:...|
|00001bd0| 36 1f ff ff 0e 2b ff fc | 36 03 ff fe 0e 2b ff f0 |6....+..|6....+..|
|00001be0| 27 7f fc 0e 2b ff 80 e1 | 07 1b ff 16 c0 e1 01 8a |'...+...|........|
|00001bf0| 7b 01 07 c0 00 18 00 0c | e1 02 89 7b f0 07 e0 00 |{.......|...{....|
|00001c00| 18 00 0c e1 02 1b 70 c1 | 06 6d 78 db 33 9e cf 36 |......p.|.mx.3..6|
|00001c10| e1 1b e0 c1 06 6f fd fb | 37 de df bf e1 0c c1 07 |.....o..|7.......|
|00001c20| ec cd 9b 36 0c d9 b3 e1 | 0c c1 07 cc cd 9b 36 0c |...6....|......6.|
|00001c30| d9 b3 e1 0c c1 06 0c fd | fb f7 ce df b3 e1 0c c1 |........|........|
|00001c40| 06 0c 78 d9 b3 86 cf 33 | e1 00 00 00 00 00 00 00 |..x....3|........|
|00001c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c60| 00 00 1a 60 46 52 45 45 | 00 00 00 00 00 00 00 00 |...`FREE|........|
|00001c70| 0f 46 72 65 65 20 4f 62 | 6a 65 63 74 20 20 20 20 |.Free Ob|ject |
|00001c80| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|00001c90| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|00001ca0| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|00001cb0| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00001cc0| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00001cd0| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00001ce0| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00001cf0| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|00001d00| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|00001d10| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|00001d20| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00001d30| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00001d40| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00001d50| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00001d60| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00001d70| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|00001d80| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|00001d90| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|00001da0| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|00001db0| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|00001dc0| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|00001dd0| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|00001de0| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|00001df0| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|00001e00| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|00001e10| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|00001e20| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|00001e30| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00001e40| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00001e50| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00001e60| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00001e70| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|00001e80| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|00001e90| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|00001ea0| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|00001eb0| 65 4d 65 0d 00 00 0a a0 | 00 02 01 80 00 69 00 a4 |eMe.....|.....i..|
|00001ec0| 00 7f 01 04 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|00001ed0| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 32 |....Play| Mouse 2|
|00001ee0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|00001ef0| 20 22 4d 6f 75 73 65 20 | 32 22 20 69 6e 74 6f 20 | "Mouse |2" into |
|00001f00| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|00001f10| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|00001f20| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|00001f30| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|00001f40| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|00001f50| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|00001f60| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|00001f70| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|00001f80| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|00001f90| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|00001fa0| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|00001fb0| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|00001fc0| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|00001fd0| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|00001fe0| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|00001ff0| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|00002000| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|00002010| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00002020| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00002030| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00002040| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00002050| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|00002060| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|00002070| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|00002080| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|00002090| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|000020a0| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|000020b0| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|000020c0| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|000020d0| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|000020e0| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|000020f0| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|00002100| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|00002110| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00002120| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00002130| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00002140| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00002150| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|00002160| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|00002170| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|00002180| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|00002190| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|000021a0| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|000021b0| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|000021c0| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|000021d0| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|000021e0| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|000021f0| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|00002200| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|00002210| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00002220| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00002230| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00002240| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00002250| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00002260| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00002270| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00002280| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00002290| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|000022a0| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|000022b0| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|000022c0| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|000022d0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|000022e0| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|000022f0| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|00002300| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|00002310| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|00002320| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|00002330| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|00002340| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|00002350| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|00002360| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|00002370| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00002380| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00002390| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|000023a0| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|000023b0| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|000023c0| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|000023d0| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|000023e0| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|000023f0| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|00002400| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|00002410| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|00002420| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|00002430| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|00002440| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|00002450| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|00002460| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|00002470| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00002480| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00002490| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|000024a0| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|000024b0| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|000024c0| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|000024d0| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|000024e0| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|000024f0| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|00002500| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|00002510| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|00002520| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|00002530| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|00002540| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|00002550| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|00002560| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|00002570| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00002580| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00002590| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|000025a0| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|000025b0| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|000025c0| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|000025d0| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|000025e0| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|000025f0| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|00002600| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|00002610| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|00002620| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|00002630| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|00002640| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|00002650| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|00002660| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|00002670| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|00002680| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|00002690| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|000026a0| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|000026b0| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|000026c0| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|000026d0| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|000026e0| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|000026f0| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|00002700| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|00002710| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|00002720| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|00002730| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|00002740| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|00002750| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00002760| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00002770| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00002780| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00002790| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|000027a0| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|000027b0| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|000027c0| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|000027d0| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|000027e0| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|000027f0| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00002800| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00002810| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|00002820| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|00002830| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|00002840| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|00002850| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|00002860| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|00002870| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|00002880| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|00002890| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|000028a0| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|000028b0| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|000028c0| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|000028d0| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|000028e0| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|000028f0| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00002900| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00002910| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|00002920| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|00002930| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|00002940| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|00002950| 65 4d 65 0d 00 00 0a a0 | 00 03 01 80 00 79 00 a8 |eMe.....|.....y..|
|00002960| 00 8f 01 08 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|00002970| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 33 |....Play| Mouse 3|
|00002980| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|00002990| 20 22 4d 6f 75 73 65 20 | 33 22 20 69 6e 74 6f 20 | "Mouse |3" into |
|000029a0| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|000029b0| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|000029c0| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|000029d0| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|000029e0| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|000029f0| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|00002a00| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|00002a10| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|00002a20| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|00002a30| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|00002a40| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|00002a50| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|00002a60| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|00002a70| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|00002a80| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|00002a90| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|00002aa0| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|00002ab0| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00002ac0| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00002ad0| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00002ae0| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00002af0| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|00002b00| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|00002b10| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|00002b20| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|00002b30| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|00002b40| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|00002b50| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|00002b60| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|00002b70| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|00002b80| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|00002b90| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|00002ba0| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|00002bb0| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00002bc0| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00002bd0| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00002be0| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00002bf0| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|00002c00| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|00002c10| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|00002c20| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|00002c30| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|00002c40| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|00002c50| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|00002c60| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|00002c70| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|00002c80| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|00002c90| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|00002ca0| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|00002cb0| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00002cc0| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00002cd0| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00002ce0| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00002cf0| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00002d00| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00002d10| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00002d20| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00002d30| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|00002d40| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|00002d50| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|00002d60| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|00002d70| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|00002d80| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|00002d90| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|00002da0| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|00002db0| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|00002dc0| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|00002dd0| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|00002de0| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|00002df0| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|00002e00| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|00002e10| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00002e20| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00002e30| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|00002e40| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|00002e50| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|00002e60| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|00002e70| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|00002e80| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|00002e90| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|00002ea0| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|00002eb0| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|00002ec0| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|00002ed0| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|00002ee0| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|00002ef0| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|00002f00| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|00002f10| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00002f20| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00002f30| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|00002f40| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|00002f50| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|00002f60| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|00002f70| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|00002f80| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|00002f90| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|00002fa0| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|00002fb0| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|00002fc0| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|00002fd0| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|00002fe0| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|00002ff0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|00003000| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|00003010| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00003020| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00003030| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|00003040| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|00003050| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|00003060| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|00003070| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|00003080| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|00003090| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|000030a0| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|000030b0| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|000030c0| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|000030d0| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|000030e0| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|000030f0| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|00003100| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|00003110| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|00003120| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|00003130| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|00003140| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|00003150| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|00003160| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|00003170| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|00003180| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|00003190| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|000031a0| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|000031b0| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|000031c0| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|000031d0| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|000031e0| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|000031f0| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00003200| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00003210| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00003220| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00003230| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|00003240| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|00003250| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|00003260| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00003270| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00003280| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00003290| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|000032a0| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|000032b0| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|000032c0| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|000032d0| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|000032e0| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|000032f0| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|00003300| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|00003310| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|00003320| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|00003330| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|00003340| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|00003350| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|00003360| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|00003370| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00003380| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00003390| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|000033a0| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|000033b0| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|000033c0| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|000033d0| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|000033e0| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|000033f0| 65 4d 65 0d 00 00 00 4f | 6e 20 49 64 6c 65 0d 47 |eMe....O|n Idle.G|
|00003400| 6c 6f 62 61 6c 20 4c 6f | 63 78 0d 49 66 20 74 68 |lobal Lo|cx.If th|
|00003410| 65 20 4d 6f 75 73 65 4c | 6f 63 20 69 73 20 6e 6f |e MouseL|oc is no|
|00003420| 74 20 4c 6f 63 78 20 74 | 68 65 6e 0d 50 75 74 20 |t Locx t|hen.Put |
|00003430| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 64 |the numb|er of cd|
|00003440| 20 62 75 74 74 6f 6e 73 | 20 69 6e 74 6f 20 52 61 | buttons| into Ra|
|00003450| 6e 64 78 0d 50 75 74 20 | 74 68 65 20 52 61 6e 64 |ndx.Put |the Rand|
|00003460| 6f 6d 20 6f 66 20 52 61 | 6e 64 78 20 69 6e 74 6f |om of Ra|ndx into|
|00003470| 20 50 6c 61 79 6e 75 6d | 0d 53 65 6e 64 20 22 4d | Playnum|.Send "M|
|00003480| 6f 75 73 65 55 70 22 20 | 74 6f 20 63 64 20 62 75 |ouseUp" |to cd bu|
|00003490| 74 74 6f 6e 20 50 6c 61 | 79 6e 75 6d 0d 45 6e 64 |tton Pla|ynum.End|
|000034a0| 20 69 66 0d 50 75 74 20 | 74 68 65 20 6d 6f 75 73 | if.Put |the mous|
|000034b0| 65 4c 6f 63 20 69 6e 74 | 6f 20 4c 6f 63 78 0d 45 |eLoc int|o Locx.E|
|000034c0| 6e 64 20 49 64 6c 65 0d | 00 00 00 00 00 00 00 00 |nd Idle.|........|
|000034d0| 00 00 00 00 00 00 60 00 | 00 00 00 00 00 00 00 00 |......`.|........|
|000034e0| 00 00 00 60 46 52 45 45 | 00 00 00 00 00 00 00 00 |...`FREE|........|
|000034f0| 0f 46 72 65 65 20 4f 62 | 6a 65 63 74 20 20 20 20 |.Free Ob|ject |
|00003500| 42 67 3f 2e ff ac 48 6d | ef d8 48 6d ef da 48 6e |Bg?...Hm|..Hm..Hn|
|00003510| fe 9e 4e ba 14 6a 30 1f | 3b 40 f1 02 4a 6d f1 02 |..N..j0.|;@..Jm..|
|00003520| 66 00 01 06 42 67 3f 2d | ef d8 2f 2d ef da 48 6d |f...Bg?-|../-..Hm|
|00003530| ef de 42 67 48 6d f0 de | 4e ba 12 f4 30 1f 3b 40 |..BgHm..|N...0.;@|
|00003540| 00 00 00 60 42 4d 41 50 | 00 00 0f 2b 00 00 00 00 |...`BMAP|...+....|
|00003550| 00 00 00 00 00 01 00 00 | 00 00 00 00 00 f0 01 a0 |........|........|
|00003560| 00 00 00 00 00 00 00 00 | 00 9b 00 e7 00 a4 00 e9 |........|........|
|00003570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 0c |........|........|
|00003580| 11 80 02 80 01 80 00 00 | 86 a6 85 00 00 00 00 00 |........|........|
|00003590| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff ff |........|........|
|000035a0| 00 00 01 20 46 52 45 45 | 00 00 00 00 00 00 00 00 |... FREE|........|
|000035b0| 0f 46 72 65 65 20 4f 62 | 6a 65 63 74 20 20 20 20 |.Free Ob|ject |
|000035c0| 00 00 09 6e 00 00 0a 38 | 00 00 00 00 00 00 00 00 |...n...8|........|
|000035d0| 00 00 00 00 00 00 00 00 | 00 ac 3f 3c 00 14 a9 c8 |........|..?<....|
|000035e0| 70 00 10 2d ef d7 4a 40 | 66 14 48 6d fe 4a 74 68 |p..-..J@|f.Hm.Jth|
|000035f0| 65 20 4d 6f 75 73 65 4c | 6f 63 20 69 73 20 6e 6f |e MouseL|oc is no|
|00003600| 74 20 4c 6f 63 78 20 74 | 68 65 6e 0d 50 75 74 20 |t Locx t|hen.Put |
|00003610| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 64 |the numb|er of cd|
|00003620| 20 62 75 74 74 6f 6e 73 | 20 69 6e 74 6f 20 52 61 | buttons| into Ra|
|00003630| 6e 64 78 0d 50 75 74 20 | 74 68 65 20 52 61 6e 64 |ndx.Put |the Rand|
|00003640| 6f 6d 20 6f 66 20 52 61 | 6e 64 78 20 69 6e 74 6f |om of Ra|ndx into|
|00003650| 20 50 6c 61 79 6e 75 6d | 0d 53 65 6e 64 20 22 4d | Playnum|.Send "M|
|00003660| 6f 75 73 65 55 70 22 20 | 74 6f 20 63 64 20 62 75 |ouseUp" |to cd bu|
|00003670| 74 74 6f 6e 20 50 6c 61 | 79 6e 75 6d 0d 45 6e 64 |tton Pla|ynum.End|
|00003680| 20 69 66 0d 50 75 74 20 | 74 68 65 20 6d 6f 75 73 | if.Put |the mous|
|00003690| 65 4c 6f 63 20 69 6e 74 | 6f 20 4c 6f 63 78 0d 45 |eLoc int|o Locx.E|
|000036a0| 6e 64 20 49 64 6c 65 0d | 00 00 ac 3f 3c 00 14 a9 |nd Idle.|...?<...|
|000036b0| c8 70 00 10 2d ef d7 4a | 40 66 14 48 6d fe 4a 00 |.p..-..J|@f.Hm.J.|
|000036c0| 00 00 21 e0 43 41 52 44 | 00 00 0b ff 00 00 00 00 |..!.CARD|........|
|000036d0| 00 00 0f 2b 00 00 00 00 | 00 00 00 00 00 00 00 00 |...+....|........|
|000036e0| 00 00 09 6e 00 00 0a 38 | 00 05 00 05 00 00 20 e6 |...n...8|...... .|
|000036f0| 00 00 00 00 00 00 0a a0 | 00 01 01 80 00 59 00 a0 |........|.....Y..|
|00003700| 00 6f 01 00 80 03 00 00 | 00 00 00 01 00 00 00 0c |.o......|........|
|00003710| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 31 |....Play| Mouse 1|
|00003720| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|00003730| 20 22 4d 6f 75 73 65 20 | 31 22 20 69 6e 74 6f 20 | "Mouse |1" into |
|00003740| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|00003750| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|00003760| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|00003770| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|00003780| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|00003790| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|000037a0| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|000037b0| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|000037c0| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|000037d0| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|000037e0| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|000037f0| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|00003800| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|00003810| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|00003820| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|00003830| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|00003840| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|00003850| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00003860| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00003870| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00003880| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00003890| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|000038a0| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|000038b0| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|000038c0| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|000038d0| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|000038e0| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|000038f0| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|00003900| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|00003910| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|00003920| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|00003930| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|00003940| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|00003950| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00003960| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00003970| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00003980| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00003990| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|000039a0| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|000039b0| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|000039c0| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|000039d0| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|000039e0| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|000039f0| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|00003a00| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|00003a10| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|00003a20| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|00003a30| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|00003a40| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|00003a50| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00003a60| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00003a70| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00003a80| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00003a90| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00003aa0| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00003ab0| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00003ac0| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00003ad0| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|00003ae0| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|00003af0| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|00003b00| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|00003b10| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|00003b20| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|00003b30| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|00003b40| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|00003b50| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|00003b60| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|00003b70| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|00003b80| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|00003b90| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|00003ba0| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|00003bb0| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00003bc0| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00003bd0| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|00003be0| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|00003bf0| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|00003c00| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|00003c10| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|00003c20| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|00003c30| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|00003c40| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|00003c50| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|00003c60| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|00003c70| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|00003c80| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|00003c90| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|00003ca0| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|00003cb0| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00003cc0| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00003cd0| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|00003ce0| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|00003cf0| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|00003d00| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|00003d10| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|00003d20| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|00003d30| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|00003d40| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|00003d50| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|00003d60| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|00003d70| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|00003d80| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|00003d90| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|00003da0| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|00003db0| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00003dc0| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00003dd0| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|00003de0| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|00003df0| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|00003e00| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|00003e10| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|00003e20| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|00003e30| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|00003e40| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|00003e50| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|00003e60| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|00003e70| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|00003e80| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|00003e90| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|00003ea0| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|00003eb0| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|00003ec0| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|00003ed0| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|00003ee0| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|00003ef0| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|00003f00| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|00003f10| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|00003f20| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|00003f30| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|00003f40| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|00003f50| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|00003f60| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|00003f70| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|00003f80| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|00003f90| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00003fa0| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00003fb0| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00003fc0| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00003fd0| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|00003fe0| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|00003ff0| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|00004000| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00004010| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00004020| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00004030| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00004040| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00004050| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|00004060| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|00004070| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|00004080| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|00004090| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|000040a0| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|000040b0| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|000040c0| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|000040d0| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|000040e0| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|000040f0| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|00004100| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|00004110| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00004120| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00004130| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00004140| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00004150| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|00004160| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|00004170| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|00004180| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|00004190| 65 4d 65 0d 00 00 0a a0 | 00 02 01 80 00 69 00 a4 |eMe.....|.....i..|
|000041a0| 00 7f 01 04 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|000041b0| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 32 |....Play| Mouse 2|
|000041c0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|000041d0| 20 22 4d 6f 75 73 65 20 | 32 22 20 69 6e 74 6f 20 | "Mouse |2" into |
|000041e0| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|000041f0| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|00004200| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|00004210| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|00004220| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|00004230| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|00004240| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|00004250| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|00004260| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|00004270| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|00004280| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|00004290| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|000042a0| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|000042b0| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|000042c0| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|000042d0| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|000042e0| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|000042f0| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00004300| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00004310| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00004320| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00004330| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|00004340| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|00004350| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|00004360| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|00004370| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|00004380| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|00004390| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|000043a0| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|000043b0| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|000043c0| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|000043d0| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|000043e0| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|000043f0| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00004400| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00004410| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00004420| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00004430| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|00004440| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|00004450| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|00004460| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|00004470| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|00004480| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|00004490| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|000044a0| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|000044b0| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|000044c0| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|000044d0| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|000044e0| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|000044f0| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00004500| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00004510| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00004520| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00004530| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00004540| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00004550| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00004560| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00004570| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|00004580| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|00004590| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|000045a0| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|000045b0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|000045c0| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|000045d0| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|000045e0| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|000045f0| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|00004600| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|00004610| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|00004620| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|00004630| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|00004640| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|00004650| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00004660| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00004670| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|00004680| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|00004690| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|000046a0| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|000046b0| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|000046c0| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|000046d0| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|000046e0| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|000046f0| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|00004700| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|00004710| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|00004720| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|00004730| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|00004740| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|00004750| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00004760| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00004770| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|00004780| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|00004790| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|000047a0| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|000047b0| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|000047c0| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|000047d0| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|000047e0| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|000047f0| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|00004800| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|00004810| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|00004820| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|00004830| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|00004840| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|00004850| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00004860| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00004870| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|00004880| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|00004890| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|000048a0| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|000048b0| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|000048c0| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|000048d0| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|000048e0| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|000048f0| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|00004900| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|00004910| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|00004920| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|00004930| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|00004940| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|00004950| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|00004960| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|00004970| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|00004980| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|00004990| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|000049a0| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|000049b0| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|000049c0| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|000049d0| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|000049e0| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|000049f0| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|00004a00| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|00004a10| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|00004a20| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|00004a30| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00004a40| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00004a50| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00004a60| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00004a70| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|00004a80| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|00004a90| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|00004aa0| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00004ab0| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00004ac0| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00004ad0| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00004ae0| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00004af0| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|00004b00| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|00004b10| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|00004b20| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|00004b30| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|00004b40| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|00004b50| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|00004b60| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|00004b70| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|00004b80| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|00004b90| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|00004ba0| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|00004bb0| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00004bc0| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00004bd0| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00004be0| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00004bf0| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|00004c00| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|00004c10| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|00004c20| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|00004c30| 65 4d 65 0d 00 00 0a a0 | 00 03 01 80 00 79 00 a8 |eMe.....|.....y..|
|00004c40| 00 8f 01 08 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|00004c50| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 33 |....Play| Mouse 3|
|00004c60| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|00004c70| 20 22 4d 6f 75 73 65 20 | 33 22 20 69 6e 74 6f 20 | "Mouse |3" into |
|00004c80| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|00004c90| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|00004ca0| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|00004cb0| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|00004cc0| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|00004cd0| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|00004ce0| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|00004cf0| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|00004d00| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|00004d10| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|00004d20| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|00004d30| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|00004d40| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|00004d50| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|00004d60| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|00004d70| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|00004d80| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|00004d90| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00004da0| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00004db0| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00004dc0| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00004dd0| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|00004de0| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|00004df0| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|00004e00| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|00004e10| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|00004e20| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|00004e30| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|00004e40| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|00004e50| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|00004e60| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|00004e70| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|00004e80| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|00004e90| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00004ea0| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00004eb0| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00004ec0| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00004ed0| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|00004ee0| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|00004ef0| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|00004f00| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|00004f10| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|00004f20| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|00004f30| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|00004f40| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|00004f50| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|00004f60| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|00004f70| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|00004f80| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|00004f90| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00004fa0| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00004fb0| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00004fc0| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00004fd0| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00004fe0| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00004ff0| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00005000| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00005010| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|00005020| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|00005030| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|00005040| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|00005050| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|00005060| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|00005070| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|00005080| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|00005090| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|000050a0| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|000050b0| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|000050c0| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|000050d0| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|000050e0| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|000050f0| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00005100| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00005110| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|00005120| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|00005130| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|00005140| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|00005150| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|00005160| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|00005170| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|00005180| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|00005190| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|000051a0| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|000051b0| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|000051c0| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|000051d0| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|000051e0| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|000051f0| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00005200| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00005210| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|00005220| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|00005230| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|00005240| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|00005250| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|00005260| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|00005270| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|00005280| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|00005290| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|000052a0| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|000052b0| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|000052c0| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|000052d0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|000052e0| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|000052f0| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00005300| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00005310| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|00005320| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|00005330| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|00005340| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|00005350| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|00005360| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|00005370| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|00005380| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|00005390| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|000053a0| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|000053b0| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|000053c0| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|000053d0| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|000053e0| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|000053f0| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|00005400| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|00005410| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|00005420| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|00005430| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|00005440| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|00005450| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|00005460| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|00005470| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|00005480| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|00005490| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|000054a0| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|000054b0| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|000054c0| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|000054d0| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|000054e0| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|000054f0| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|00005500| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|00005510| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|00005520| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|00005530| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|00005540| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|00005550| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00005560| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00005570| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00005580| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00005590| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|000055a0| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|000055b0| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|000055c0| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|000055d0| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|000055e0| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|000055f0| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|00005600| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|00005610| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|00005620| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|00005630| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|00005640| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|00005650| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00005660| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00005670| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00005680| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00005690| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|000056a0| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|000056b0| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|000056c0| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|000056d0| 65 4d 65 0d 00 00 00 c2 | 00 04 01 00 00 95 00 a3 |eMe.....|........|
|000056e0| 00 aa 00 d5 20 00 00 00 | 00 00 00 01 00 00 00 0c |.... ...|........|
|000056f0| 00 00 00 10 48 45 52 45 | 21 00 00 6f 6e 20 6d 6f |....HERE|!..on mo|
|00005700| 75 73 65 55 70 0d 47 6c | 6f 62 61 6c 20 49 44 0d |useUp.Gl|obal ID.|
|00005710| 41 73 6b 20 22 57 68 6f | 20 61 72 65 20 79 6f 75 |Ask "Who| are you|
|00005720| 3f 22 0d 49 66 20 69 74 | 20 69 73 20 65 6d 70 74 |?".If it| is empt|
|00005730| 79 20 74 68 65 6e 20 65 | 78 69 74 20 4d 6f 75 73 |y then e|xit Mous|
|00005740| 65 55 70 0d 50 75 74 20 | 69 74 20 69 6e 74 6f 20 |eUp.Put |it into |
|00005750| 49 44 0d 56 69 73 75 61 | 6c 20 65 66 66 65 63 74 |ID.Visua|l effect|
|00005760| 20 64 69 73 73 6f 6c 76 | 65 20 76 65 72 79 20 66 | dissolv|e very f|
|00005770| 61 73 74 20 74 6f 20 63 | 61 72 64 0d 67 6f 20 74 |ast to c|ard.go t|
|00005780| 6f 20 6e 65 78 74 20 63 | 61 72 64 0d 65 6e 64 20 |o next c|ard.end |
|00005790| 6d 6f 75 73 65 55 70 00 | 00 44 00 05 01 00 00 09 |mouseUp.|.D......|
|000057a0| 00 a9 00 33 00 d7 20 00 | 00 00 4e 82 00 01 00 00 |...3.. .|..N.....|
|000057b0| 00 0c 00 00 00 10 48 6f | 6d 65 00 00 6f 6e 20 6d |......Ho|me..on m|
|000057c0| 6f 75 73 65 55 70 0d 47 | 6f 20 68 6f 6d 65 0d 65 |ouseUp.G|o home.e|
|000057d0| 6e 64 20 6d 6f 75 73 65 | 55 70 00 00 00 00 00 00 |nd mouse|Up......|
|000057e0| 00 00 00 00 00 00 00 00 | 01 4e 00 00 00 2a fb e8 |........|.N...*..|
|000057f0| 00 0a 00 2a fb dc 00 22 | 00 2a fb d4 00 46 00 00 |...*..."|.*...F..|
|00005800| 00 00 00 05 e4 cc 02 59 | 00 00 00 00 00 00 00 00 |.......Y|........|
|00005810| 00 00 00 00 00 40 00 04 | e2 f8 00 0a 00 00 00 00 |.....@..|........|
|00005820| 00 00 00 00 00 12 00 00 | 00 00 00 00 00 28 00 00 |........|.....(..|
|00005830| 00 48 00 00 00 48 00 00 | 00 00 00 08 00 01 00 08 |.H...H..|........|
|00005840| 00 00 00 00 00 00 21 10 | 00 00 00 00 00 00 07 d8 |......!.|........|
|00005850| 00 26 11 40 07 90 00 03 | 4e 56 00 00 20 6e 00 08 |.&.@....|NV.. n..|
|00005860| 67 08 48 68 ff f0 4e ad | 20 ba 20 6e 00 08 2c 48 |g.Hh..N.| . n..,H|
|00005870| 4e fa 02 a6 00 00 4e 5e | 20 5f de fc 00 0a 6c 65 |N.....N^| _....le|
|00005880| 0d 00 00 00 00 00 00 00 | 00 00 00 00 01 4e 00 00 |........|.....N..|
|00005890| 00 2a fb e8 00 0a 00 2a | fb dc 00 22 00 2a fb d4 |.*.....*|...".*..|
|000058a0| 00 00 22 60 46 52 45 45 | 00 00 00 00 00 00 00 00 |.."`FREE|........|
|000058b0| 0f 46 72 65 65 20 4f 62 | 6a 65 63 74 20 20 20 20 |.Free Ob|ject |
|000058c0| 00 00 09 6e 00 00 0a 38 | 00 03 00 03 00 00 1f e0 |...n...8|........|
|000058d0| 00 00 00 00 00 00 0a a0 | 00 01 01 80 00 59 00 a0 |........|.....Y..|
|000058e0| 00 6f 01 00 80 03 00 00 | 00 00 00 01 00 00 00 0c |.o......|........|
|000058f0| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 31 |....Play| Mouse 1|
|00005900| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|00005910| 20 22 4d 6f 75 73 65 20 | 31 22 20 69 6e 74 6f 20 | "Mouse |1" into |
|00005920| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|00005930| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|00005940| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|00005950| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
|00005960| 48 65 72 65 22 0d 69 66 | 20 74 68 65 20 43 6f 6d |Here".if| the Com|
|00005970| 6d 61 6e 64 4b 65 79 20 | 69 73 20 22 64 6f 77 6e |mandKey |is "down|
|00005980| 22 20 74 68 65 6e 0d 61 | 6e 73 77 65 72 20 22 41 |" then.a|nswer "A|
|00005990| 72 65 20 79 6f 75 20 73 | 75 72 65 20 79 6f 75 20 |re you s|ure you |
|000059a0| 77 61 6e 74 20 74 6f 20 | 64 65 6c 65 74 65 22 20 |want to |delete" |
|000059b0| 26 26 20 71 75 6f 74 65 | 20 26 20 74 68 65 53 6f |&& quote| & theSo|
|000059c0| 75 6e 64 4e 61 6d 65 20 | 26 20 71 75 6f 74 65 20 |undName |& quote |
|000059d0| 26 20 22 3f 22 c2 20 2d | 2d c6 0d 77 69 74 68 20 |& "?". -|-..with |
|000059e0| 22 4e 6f 22 20 6f 72 20 | 22 59 65 73 22 20 20 2d |"No" or |"Yes" -|
|000059f0| 2d c6 0d 69 66 20 69 74 | 20 69 73 20 22 59 65 73 |-..if it| is "Yes|
|00005a00| 22 20 74 68 65 6e 20 2d | 2d c6 0d 73 65 74 20 63 |" then -|-..set c|
|00005a10| 75 72 73 6f 72 20 74 6f | 20 77 61 74 63 68 0d 64 |ursor to| watch.d|
|00005a20| 65 6c 65 74 65 4d 65 0d | 65 78 69 74 20 6d 6f 75 |eleteMe.|exit mou|
|00005a30| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 73 65 74 20 |seUp.end| if.set |
|00005a40| 74 68 65 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |the hili|te of me|
|00005a50| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6c 73 65 0d 69 | to fals|e.else.i|
|00005a60| 66 20 22 3a 41 75 64 69 | 6f 20 48 65 6c 70 22 20 |f ":Audi|o Help" |
|00005a70| 26 20 72 65 74 75 72 6e | 20 69 73 20 69 6e 20 74 |& return| is in t|
|00005a80| 68 65 20 73 74 61 63 6b | 73 49 6e 55 73 65 20 26 |he stack|sInUse &|
|00005a90| 20 72 65 74 75 72 6e 20 | 74 68 65 6e 20 2d 2d c6 | return |then --.|
|00005aa0| 0d 69 66 20 6e 6f 74 20 | 53 6e 64 45 78 69 73 74 |.if not |SndExist|
|00005ab0| 73 28 74 68 65 53 6f 75 | 6e 64 4e 61 6d 65 29 20 |s(theSou|ndName) |
|00005ac0| 74 68 65 6e 0d 61 6e 73 | 77 65 72 20 22 54 68 65 |then.ans|wer "The|
|00005ad0| 20 73 6f 75 6e 64 20 61 | 73 73 6f 63 69 61 74 65 | sound a|ssociate|
|00005ae0| 64 20 77 69 74 68 20 74 | 68 69 73 20 62 75 74 74 |d with t|his butt|
|00005af0| 6f 6e 20 68 61 73 20 62 | 65 65 6e 20 64 65 6c 65 |on has b|een dele|
|00005b00| 74 65 64 2e 22 26 26 c2 | 20 2d 2d c6 0d 22 20 57 |ted."&&.| --.." W|
|00005b10| 6f 75 6c 64 20 79 6f 75 | 20 6c 69 6b 65 20 74 6f |ould you| like to|
|00005b20| 20 64 65 6c 65 74 65 20 | 74 68 65 20 62 75 74 74 | delete |the butt|
|00005b30| 6f 6e 20 61 73 20 77 65 | 6c 6c 3f 22 c2 20 2d 2d |on as we|ll?". --|
|00005b40| c6 0d 77 69 74 68 20 22 | 4e 6f 22 20 6f 72 20 22 |..with "|No" or "|
|00005b50| 59 65 73 22 20 2d 2d c6 | 0d 69 66 20 69 74 20 69 |Yes" --.|.if it i|
|00005b60| 73 20 22 59 65 73 22 20 | 74 68 65 6e 20 64 65 6c |s "Yes" |then del|
|00005b70| 65 74 65 4d 65 20 2d 2d | c6 0d 73 65 74 20 74 68 |eteMe --|..set th|
|00005b80| 65 20 68 69 6c 69 74 65 | 20 6f 66 20 6d 65 20 74 |e hilite| of me t|
|00005b90| 6f 20 66 61 6c 73 65 0d | 65 78 69 74 20 6d 6f 75 |o false.|exit mou|
|00005ba0| 73 65 55 70 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |seUp.end| if.end |
|00005bb0| 69 66 0d 70 6c 61 79 20 | 74 68 65 53 6f 75 6e 64 |if.play |theSound|
|00005bc0| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 6f 75 6e |Name.if |the soun|
|00005bd0| 64 20 69 73 20 6e 6f 74 | 20 74 68 65 53 6f 75 6e |d is not| theSoun|
|00005be0| 64 4e 61 6d 65 20 74 68 | 65 6e 0d 61 6e 73 77 65 |dName th|en.answe|
|00005bf0| 72 20 22 53 6f 75 6e 64 | 22 20 26 26 20 71 75 6f |r "Sound|" && quo|
|00005c00| 74 65 20 26 20 74 68 65 | 53 6f 75 6e 64 4e 61 6d |te & the|SoundNam|
|00005c10| 65 20 26 20 71 75 6f 74 | 65 20 26 26 20 22 63 61 |e & quot|e && "ca|
|00005c20| 6e 6e 6f 74 20 62 65 20 | 70 6c 61 79 65 64 2e 22 |nnot be |played."|
|00005c30| 20 2d 2d c6 0d 73 65 74 | 20 74 68 65 20 68 69 6c | --..set| the hil|
|00005c40| 69 74 65 20 6f 66 20 6d | 65 20 74 6f 20 66 61 6c |ite of m|e to fal|
|00005c50| 73 65 0d 65 78 69 74 20 | 6d 6f 75 73 65 55 70 0d |se.exit |mouseUp.|
|00005c60| 65 6e 64 20 69 66 0d 73 | 65 74 20 74 68 65 20 68 |end if.s|et the h|
|00005c70| 69 6c 69 74 65 20 6f 66 | 20 6d 65 20 74 6f 20 74 |ilite of| me to t|
|00005c80| 72 75 65 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |rue.repe|at until|
|00005c90| 20 74 68 65 20 73 6f 75 | 6e 64 20 69 73 20 64 6f | the sou|nd is do|
|00005ca0| 6e 65 0d 69 66 20 74 68 | 65 20 6d 6f 75 73 65 20 |ne.if th|e mouse |
|00005cb0| 69 73 20 64 6f 77 6e 20 | 74 68 65 6e 20 70 6c 61 |is down |then pla|
|00005cc0| 79 20 73 74 6f 70 0d 65 | 6e 64 20 72 65 70 65 61 |y stop.e|nd repea|
|00005cd0| 74 0d 73 65 74 20 74 68 | 65 20 68 69 6c 69 74 65 |t.set th|e hilite|
|00005ce0| 20 6f 66 20 6d 65 20 74 | 6f 20 66 61 6c 73 65 0d | of me t|o false.|
|00005cf0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 6d 6f 75 73 65 |end if.e|nd mouse|
|00005d00| 55 70 0d 0d 6f 6e 20 6d | 6f 75 73 65 44 6f 77 6e |Up..on m|ouseDown|
|00005d10| 0d 69 66 20 74 68 65 20 | 4f 70 74 69 6f 6e 4b 65 |.if the |OptionKe|
|00005d20| 79 20 69 73 20 64 6f 77 | 6e 20 74 68 65 6e 0d 72 |y is dow|n then.r|
|00005d30| 65 70 65 61 74 20 75 6e | 74 69 6c 20 74 68 65 20 |epeat un|til the |
|00005d40| 6d 6f 75 73 65 20 69 73 | 20 75 70 0d 73 65 74 20 |mouse is| up.set |
|00005d50| 74 68 65 20 6c 6f 63 20 | 6f 66 20 6d 65 20 74 6f |the loc |of me to|
|00005d60| 20 74 68 65 20 6d 6f 75 | 73 65 6c 6f 63 0d 65 6e | the mou|seloc.en|
|00005d70| 64 20 72 65 70 65 61 74 | 0d 67 65 74 20 74 68 65 |d repeat|.get the|
|00005d80| 20 72 65 63 74 20 6f 66 | 20 74 68 69 73 20 63 61 | rect of| this ca|
|00005d90| 72 64 0d 69 66 20 74 68 | 65 20 6c 6f 63 20 6f 66 |rd.if th|e loc of|
|00005da0| 20 6d 65 20 69 73 20 6e | 6f 74 20 77 69 74 68 69 | me is n|ot withi|
|00005db0| 6e 20 69 74 20 74 68 65 | 6e 0d 70 75 74 20 74 68 |n it the|n.put th|
|00005dc0| 65 20 68 65 69 67 68 74 | 20 6f 66 20 74 68 69 73 |e height| of this|
|00005dd0| 20 63 61 72 64 20 64 69 | 76 20 32 20 69 6e 74 6f | card di|v 2 into|
|00005de0| 20 76 65 72 74 0d 70 75 | 74 20 74 68 65 20 77 69 | vert.pu|t the wi|
|00005df0| 64 74 68 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |dth of t|his card|
|00005e00| 20 64 69 76 20 32 20 69 | 6e 74 6f 20 68 6f 72 0d | div 2 i|nto hor.|
|00005e10| 73 65 74 20 74 68 65 20 | 6c 6f 63 20 6f 66 20 6d |set the |loc of m|
|00005e20| 65 20 74 6f 20 68 6f 72 | 2c 76 65 72 74 0d 65 6e |e to hor|,vert.en|
|00005e30| 64 20 69 66 0d 65 78 69 | 74 20 74 6f 20 68 79 70 |d if.exi|t to hyp|
|00005e40| 65 72 63 61 72 64 0d 65 | 6c 73 65 0d 70 75 74 20 |ercard.e|lse.put |
|00005e50| 66 61 6c 73 65 20 69 6e | 74 6f 20 4f 6c 64 53 74 |false in|to OldSt|
|00005e60| 61 74 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ate.put |true int|
|00005e70| 6f 20 4e 65 77 53 74 61 | 74 65 20 2d 2d 20 69 6e |o NewSta|te -- in|
|00005e80| 20 63 61 73 65 20 74 68 | 65 20 63 6c 69 63 6b 20 | case th|e click |
|00005e90| 77 61 73 20 72 65 61 6c | 6c 79 20 66 61 73 74 0d |was real|ly fast.|
|00005ea0| 73 65 74 20 74 68 65 20 | 68 69 6c 69 74 65 20 6f |set the |hilite o|
|00005eb0| 66 20 6d 65 20 74 6f 20 | 74 72 75 65 0d 72 65 70 |f me to |true.rep|
|00005ec0| 65 61 74 20 75 6e 74 69 | 6c 20 74 68 65 20 6d 6f |eat unti|l the mo|
|00005ed0| 75 73 65 20 69 73 20 75 | 70 0d 70 75 74 20 74 68 |use is u|p.put th|
|00005ee0| 65 20 6d 6f 75 73 65 4c | 6f 63 20 69 73 20 77 69 |e mouseL|oc is wi|
|00005ef0| 74 68 69 6e 20 74 68 65 | 20 72 65 63 74 20 6f 66 |thin the| rect of|
|00005f00| 20 6d 65 20 69 6e 74 6f | 20 4e 65 77 53 74 61 74 | me into| NewStat|
|00005f10| 65 0d 69 66 20 4e 65 77 | 53 74 61 74 65 20 ad 20 |e.if New|State . |
|00005f20| 4f 6c 64 53 74 61 74 65 | 20 74 68 65 6e 0d 73 65 |OldState| then.se|
|00005f30| 74 20 74 68 65 20 68 69 | 6c 69 74 65 20 6f 66 20 |t the hi|lite of |
|00005f40| 6d 65 20 74 6f 20 4e 65 | 77 53 74 61 74 65 0d 70 |me to Ne|wState.p|
|00005f50| 75 74 20 4e 65 77 53 74 | 61 74 65 20 69 6e 74 6f |ut NewSt|ate into|
|00005f60| 20 4f 6c 64 53 74 61 74 | 65 0d 65 6e 64 20 69 66 | OldStat|e.end if|
|00005f70| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 69 66 20 6e |.end rep|eat.if n|
|00005f80| 6f 74 20 4e 65 77 53 74 | 61 74 65 20 74 68 65 6e |ot NewSt|ate then|
|00005f90| 0d 73 65 74 20 68 69 6c | 69 74 65 20 6f 66 20 6d |.set hil|ite of m|
|00005fa0| 65 20 74 6f 20 66 61 6c | 73 65 0d 65 78 69 74 20 |e to fal|se.exit |
|00005fb0| 74 6f 20 68 79 70 65 72 | 63 61 72 64 0d 65 6e 64 |to hyper|card.end|
|00005fc0| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d | if.end |if.end m|
|00005fd0| 6f 75 73 65 44 6f 77 6e | 0d 0d 6f 6e 20 64 65 6c |ouseDown|..on del|
|00005fe0| 65 74 65 4d 65 0d 67 6c | 6f 62 61 6c 20 41 50 48 |eteMe.gl|obal APH|
|00005ff0| 61 73 45 64 69 74 2c 41 | 50 48 61 73 57 61 76 65 |asEdit,A|PHasWave|
|00006000| 45 64 69 74 0d 70 75 74 | 20 74 68 65 20 73 68 6f |Edit.put| the sho|
|00006010| 72 74 20 6e 61 6d 65 20 | 6f 66 20 6d 65 20 69 6e |rt name |of me in|
|00006020| 74 6f 20 62 74 6e 4e 61 | 6d 65 0d 70 75 74 20 74 |to btnNa|me.put t|
|00006030| 68 65 20 6c 6f 6e 67 20 | 6e 61 6d 65 20 6f 66 20 |he long |name of |
|00006040| 74 68 69 73 20 73 74 61 | 63 6b 20 69 6e 74 6f 20 |this sta|ck into |
|00006050| 73 74 61 6b 4e 61 6d 65 | 0d 64 65 6c 65 74 65 20 |stakName|.delete |
|00006060| 74 68 65 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |the firs|t word o|
|00006070| 66 20 62 74 6e 4e 61 6d | 65 0d 64 65 6c 65 74 65 |f btnNam|e.delete|
|00006080| 20 74 68 65 20 66 69 72 | 73 74 20 77 6f 72 64 20 | the fir|st word |
|00006090| 6f 66 20 73 74 61 6b 4e | 61 6d 65 0d 64 65 6c 65 |of stakN|ame.dele|
|000060a0| 74 65 20 74 68 65 20 66 | 69 72 73 74 20 63 68 61 |te the f|irst cha|
|000060b0| 72 20 6f 66 20 73 74 61 | 6b 4e 61 6d 65 0d 64 65 |r of sta|kName.de|
|000060c0| 6c 65 74 65 20 74 68 65 | 20 6c 61 73 74 20 63 68 |lete the| last ch|
|000060d0| 61 72 20 6f 66 20 73 74 | 61 6b 4e 61 6d 65 0d 6c |ar of st|akName.l|
|000060e0| 6f 63 6b 20 73 63 72 65 | 65 6e 0d 69 66 20 41 50 |ock scre|en.if AP|
|000060f0| 48 61 73 45 64 69 74 20 | 69 73 20 74 72 75 65 20 |HasEdit |is true |
|00006100| 74 68 65 6e 0d 69 66 20 | 41 50 48 61 73 57 61 76 |then.if |APHasWav|
|00006110| 65 45 64 69 74 20 69 73 | 20 74 72 75 65 20 74 68 |eEdit is| true th|
|00006120| 65 6e 20 70 75 74 20 22 | 43 6c 65 61 72 22 20 69 |en put "|Clear" i|
|00006130| 6e 74 6f 20 6d 65 6e 75 | 49 74 65 6d 20 36 20 6f |nto menu|Item 6 o|
|00006140| 66 20 6d 65 6e 75 20 33 | 20 20 2d 2d c6 0d 73 65 |f menu 3| --..se|
|00006150| 6e 64 20 22 74 65 6d 70 | 47 69 76 65 55 70 45 64 |nd "temp|GiveUpEd|
|00006160| 69 74 22 20 74 6f 20 77 | 69 6e 64 6f 77 20 22 41 |it" to w|indow "A|
|00006170| 75 64 69 6f 50 61 6c 65 | 74 74 65 22 0d 65 6e 64 |udioPale|tte".end|
|00006180| 20 69 66 0d 67 65 74 20 | 74 68 65 20 75 73 65 72 | if.get |the user|
|00006190| 6c 65 76 65 6c 0d 73 65 | 74 20 74 68 65 20 75 73 |level.se|t the us|
|000061a0| 65 72 6c 65 76 65 6c 20 | 74 6f 20 35 0d 73 65 6c |erlevel |to 5.sel|
|000061b0| 65 63 74 20 6d 65 0d 73 | 65 6e 64 20 22 64 6f 4d |ect me.s|end "doM|
|000061c0| 65 6e 75 20 43 6c 65 61 | 72 20 42 75 74 74 6f 6e |enu Clea|r Button|
|000061d0| 22 20 74 6f 20 48 79 70 | 65 72 43 61 72 64 0d 63 |" to Hyp|erCard.c|
|000061e0| 68 6f 6f 73 65 20 62 72 | 6f 77 73 65 20 74 6f 6f |hoose br|owse too|
|000061f0| 6c 0d 73 65 74 20 74 68 | 65 20 75 73 65 72 6c 65 |l.set th|e userle|
|00006200| 76 65 6c 20 74 6f 20 69 | 74 0d 69 66 20 41 50 48 |vel to i|t.if APH|
|00006210| 61 73 45 64 69 74 20 69 | 73 20 74 72 75 65 20 74 |asEdit i|s true t|
|00006220| 68 65 6e 0d 69 66 20 41 | 50 48 61 73 57 61 76 65 |hen.if A|PHasWave|
|00006230| 45 64 69 74 20 69 73 20 | 74 72 75 65 20 74 68 65 |Edit is |true the|
|00006240| 6e 20 70 75 74 20 22 43 | 6c 65 61 72 20 53 6f 75 |n put "C|lear Sou|
|00006250| 6e 64 22 20 69 6e 74 6f | 20 6d 65 6e 75 69 74 65 |nd" into| menuite|
|00006260| 6d 20 36 20 6f 66 20 6d | 65 6e 75 20 33 20 20 2d |m 6 of m|enu 3 -|
|00006270| 2d c6 0d 73 65 6e 64 20 | 22 74 65 6d 70 54 61 6b |-..send |"tempTak|
|00006280| 65 42 61 63 6b 45 64 69 | 74 22 20 74 6f 20 77 69 |eBackEdi|t" to wi|
|00006290| 6e 64 6f 77 20 22 41 75 | 64 69 6f 50 61 6c 65 74 |ndow "Au|dioPalet|
|000062a0| 74 65 22 0d 65 6e 64 20 | 69 66 0d 75 6e 6c 6f 63 |te".end |if.unloc|
|000062b0| 6b 20 73 63 72 65 65 6e | 0d 69 66 20 22 3a 41 75 |k screen|.if ":Au|
|000062c0| 64 69 6f 20 48 65 6c 70 | 22 20 26 20 72 65 74 75 |dio Help|" & retu|
|000062d0| 72 6e 20 69 73 20 69 6e | 20 74 68 65 20 73 74 61 |rn is in| the sta|
|000062e0| 63 6b 73 49 6e 55 73 65 | 20 26 20 72 65 74 75 72 |cksInUse| & retur|
|000062f0| 6e 20 2d 2d c6 0d 74 68 | 65 6e 20 64 65 6c 65 74 |n --..th|en delet|
|00006300| 65 53 6e 64 20 73 74 61 | 6b 4e 61 6d 65 2c 20 62 |eSnd sta|kName, b|
|00006310| 74 6e 4e 61 6d 65 0d 69 | 66 20 74 68 65 72 65 20 |tnName.i|f there |
|00006320| 69 73 20 61 20 77 69 6e | 64 6f 77 20 22 41 75 64 |is a win|dow "Aud|
|00006330| 69 6f 50 61 6c 65 74 74 | 65 22 20 74 68 65 6e 20 |ioPalett|e" then |
|00006340| 73 65 6e 64 20 22 75 70 | 64 61 74 65 22 20 74 6f |send "up|date" to|
|00006350| 20 77 69 6e 64 6f 77 20 | 22 41 75 64 69 6f 50 61 | window |"AudioPa|
|00006360| 6c 65 74 74 65 22 0d 65 | 6e 64 20 64 65 6c 65 74 |lette".e|nd delet|
|00006370| 65 4d 65 0d 00 00 0a a0 | 00 02 01 80 00 69 00 a4 |eMe.....|.....i..|
|00006380| 00 7f 01 04 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|00006390| 00 00 00 10 50 6c 61 79 | 20 4d 6f 75 73 65 20 32 |....Play| Mouse 2|
|000063a0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 75 74 |..on mou|seUp.put|
|000063b0| 20 22 4d 6f 75 73 65 20 | 32 22 20 69 6e 74 6f 20 | "Mouse |2" into |
|000063c0| 74 68 65 53 6f 75 6e 64 | 4e 61 6d 65 20 2d 2d 77 |theSound|Name --w|
|000063d0| 65 20 73 74 69 63 6b 20 | 74 68 65 20 61 63 74 75 |e stick |the actu|
|000063e0| 61 6c 20 73 6f 75 6e 64 | 20 6e 61 6d 65 20 69 6e |al sound| name in|
|000063f0| 74 6f 20 22 70 75 74 53 | 6f 75 6e 64 4e 61 6d 65 |to "putS|oundName|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.